home *** CD-ROM | disk | FTP | other *** search
/ Linux Cubed Series 3: Developer Tools / Linux Cubed Series 3 - Developer Tools.iso / devel / make / icmake-6.000 / icmake-6 / icmake / exec / fungets.c < prev    next >
Encoding:
C/C++ Source or Header  |  1994-02-08  |  409 b   |  27 lines
  1. /*
  2. \funcref{fun\_gets}{void fun\_gets ()}
  3.     {}
  4.     {}
  5.     {}
  6.     {fun\_getch()}
  7.     {fungets.c}
  8.     {
  9.  
  10.         This function reads in a string and returns it in the {\em reg} return
  11.         register as an {\em e\_str} value.
  12.  
  13.     }
  14. */
  15.  
  16. #include "icm-exec.h"
  17.  
  18. void fun_gets ()
  19. {
  20.     char
  21.         buffer [255];
  22.  
  23.     fflush (stdout);
  24.     reg = newvar (e_str);
  25.     reg.vu.i->ls.str = xstrdup (gets (buffer));
  26. }
  27.